home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d7 / hostplus.arc / PUMAUP.SLT < prev    next >
Text File  |  1990-04-22  |  839b  |  23 lines
  1. ///////////////////////////////  PUMAUP.SLT  /////////////////////////////////
  2. //
  3. // Written and developed by Lawrence Stone, April, 1990
  4. //
  5. // This is a sample script for uploading with the PUMA file transfer protocal.
  6. //
  7. // To compile this script for use by Telix, type 'cs pumaup' at the DOS
  8. // prompt.
  9. //
  10. //////////////////////////////////////////////////////////////////////////////
  11.  
  12. str prg[4] = "PUMA",           // Puma is the protocal program to run.
  13.     cmmd[66] = "s ",           // Note "s" for "send" is required by PUMA.
  14.     fname[64] = "puma";        // Establish a string for the filenames.
  15.  
  16. main()
  17.  {
  18.   fname = _ext_filespec;       // Get the file(s) to upload from Telix.
  19.   strcat(cmmd, fname);         // Concatenate the command line with filenames.
  20.   run(prg, cmmd, 0);           // Run PUMA
  21.  }
  22.  
  23.